﻿Partial Public Class EmployeeExplorer
    Public Overridable Sub ProcessCurrentMasterRecord(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Base.ValidateRowEventArgs)
        Throw New NotImplementedException
    End Sub
    Public Overridable Sub ValidateMasterRow(sender As Object, e As Views.Base.ValidateRowEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub ValidateDetailRow(sender As Object, e As Views.Base.ValidateRowEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub InitNewMasterRow(sender As Object, e As InitNewRowEventArgs)
        Dim view As GridView = CType(sender, GridView)
        Dim row As DataRow = view.GetFocusedDataRow()
        Using Employee As SystemBoxSDK.PL.TSMSDK.Employee_PL = New SystemBoxSDK.PL.TSMSDK.Employee_PL()

            Employee.NewRecord(row)
        End Using

    End Sub

    Public Overridable Sub CustomRowCellEditForEditing(ByVal sender As Object, ByVal e As CustomRowCellEditEventArgs)
        Dim aView As GridView = DirectCast(sender, GridView)
        Dim aRTEdit As RepositoryItemButtonRichTextEditExt
        Dim aLov As New RepositoryItemGridLookUpEdit()

        Dim aRow As DataRow = aView.GetFocusedDataRow()

        If Not IsNothing(aView.Columns("ResumeDocument")) Then
            If e.Column.FieldName = "ResumeDocument" Then
                aRTEdit = New RepositoryItemButtonRichTextEditExt
                aRTEdit.Text = e.CellValue.ToString
                aView.GridControl.RepositoryItems.Add(aRTEdit)
                e.RepositoryItem = aRTEdit
            End If
        End If
    End Sub




    Public Overridable Sub InitNewDetailRow(sender As Object, e As InitNewRowEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub ProcessCurrentDetailRecord(sender As Object, e As Views.Base.ValidateRowEventArgs, index As Integer)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub DetailCellValueChanged(sender As Object, e As Views.Base.CellValueChangedEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub MasterRowClick(sender As Object, e As RowClickEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub DetailRowClick(sender As Object, e As RowClickEventArgs)
        Throw New NotImplementedException
    End Sub

    Public Overridable Sub DetailCustomRowCellEditForEditing(sender As Object, e As CustomRowCellEditEventArgs)
        Throw New NotImplementedException
    End Sub


End Class
